home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / eulisp / you-075a.lha / you-075a / sio.h < prev    next >
C/C++ Source or Header  |  1992-06-18  |  847b  |  23 lines
  1. #include <string.h>
  2. #include <ctype.h>
  3.  
  4. #ifndef SOCKET_BUFFER_SIZE
  5. #define SOCKET_BUFFER_SIZE (10240)
  6. #endif
  7.  
  8. extern SYSTEM_THREAD_SPECIFIC_DECLARATION(LispObject,socket_buffer_form);
  9. extern SYSTEM_THREAD_SPECIFIC_DECLARATION(char *,socket_buffer);
  10. extern SYSTEM_THREAD_SPECIFIC_DECLARATION(int,socket_buffer_ptr);
  11.  
  12. #define BUFFER_LEFT() (SOCKET_BUFFER_SIZE - \
  13.                SYSTEM_THREAD_SPECIFIC_VALUE(socket_buffer_ptr))
  14. #define BUFFER_PTR() (SYSTEM_THREAD_SPECIFIC_VALUE(socket_buffer_ptr))
  15. #define BUFFER() (SYSTEM_THREAD_SPECIFIC_VALUE(socket_buffer) +\
  16.           SYSTEM_THREAD_SPECIFIC_VALUE(socket_buffer_ptr))
  17. #define BUFFER_START() (SYSTEM_THREAD_SPECIFIC_VALUE(socket_buffer))
  18. #define BUFFER_FORM() (SYSTEM_THREAD_SPECIFIC_VALUE(socket_buffer_form))
  19.  
  20. extern void write_object(LispObject*,LispObject);
  21. extern LispObject read_object(LispObject*);
  22.  
  23.